home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -serious- / graphics / fxforge / starmaker 2 < prev    next >
Text File  |  1999-06-15  |  772b  |  26 lines
  1. Category: Filter Factory Gallery B
  2. Title: Starmaker...
  3. Author: Mario Klingemann
  4. Copyright: Copyright © 1996 Visual Manipulation
  5.  
  6. ctl[0]: Center X
  7. ctl[1]: Center Y
  8. ctl[2]: Soft Radius
  9. ctl[3]: Hard Radius
  10. ctl[4]: Rotation 1
  11. ctl[5]: Beam 1
  12. ctl[6]:Rotation 2
  13. ctl[7]: Beam 2
  14. val[0]: 128
  15. val[1]: 128
  16. val[2]: 183
  17. val[3]: 97
  18. val[4]: 151
  19. val[5]: 83
  20. val[6]: 181
  21. val[7]: 112
  22. R:put(c2d(x-val(0,0,X),y-val(1,0,Y))+val(4,0,1024),1),put(c2d(x-val(0,0,X),y-val(1,0,Y))+val(6,0,1024),2),put(c2m(x-val(0,0,X),y-val(1,0,Y))+mix(-val(3,0,M),0,sin(get(1)*val(5,0,100))+sin(get(2)*val(7,0,100))+512,1024),0),put(scl(get(0),0,val(2,0,M/2),255,0),4),get(0)<val(2,0,M/2)?get(4)+c-(get(4)*c/255):c
  23. G:get(0)<val(2,0,M/2)?get(4)+c-(get(4)*c/255):c
  24. B:get(0)<val(2,0,M/2)?get(4)+c-(get(4)*c/255):c
  25. A:a
  26.